home *** CD-ROM | disk | FTP | other *** search
/ Best of www.BestZips.com (Collector's Edition) / Best of WWW.BESTZIPS.COM Collector's Edition (JCSM Shareware) (JCS Marketing).ISO / grapprog / splt300w.zip / THPGL2.ZIP / T166.BAS < prev    next >
BASIC Source File  |  1995-05-01  |  440b  |  16 lines

  1. 10 OPEN "T166.PLT" FOR OUTPUT AS 1
  2. 20 PRINT #1,"INPS7000,5000SP1SI.187,.269PA1500,3000"
  3. 30 X=50
  4. 40 PRINT #1,"LB",X,X+1,X+2,+CHR$(3)
  5. 50 PRINT #1,"PA1500,2500"
  6. 60 Y=50
  7. 70 PRINT #1,"LB";Y;Y+1;Y+2;+CHR$(3)
  8. 80 PRINT #1,"PA1500,2000"
  9. 90 Z=50
  10. 100 PRINT #1,"LB";Z;"----";Z+1;"----";Z+2;+CHR$(3)
  11. 110 PRINT #1,"PA1500,3000WG20,0,360"
  12. 120 PRINT #1,"PD1500,2500WG20,0,360"
  13. 130 PRINT #1,"PD1500,2000WG20,0,360"
  14. 140 PRINT #1,"PG;"
  15. 150 END
  16.